home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
util
/
misc
/
ispell31.lha
/
ispell-3.1.18src
/
Amiga
/
interfaces
/
GUISpell-1.1
/
libraries.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-09-26
|
683b
|
34 lines
#pragma msg 148 ignore push
#pragma msg 149 ignore push
#pragma msg 61 ignore push
#include <proto/exec.h>
#pragma msg 149 pop
#pragma msg 61 pop
#define INCLUDE_LIBS_STRUCT
#include "libraries.h"
#include "error.h"
extern char *_ProgramName;
void OpenLibraries (void)
{
int i;
for (i = 0; libs[i].name; i++)
if (!(libs[i].base = OpenLibrary (libs[i].name, libs[i].version)))
Error ("ssssds", _ProgramName, ": Can't open needed library (",
libs[i].name, " version ", libs[i].version, ")!\n");
}
void CloseLibraries (void)
{
int i;
for (i = 0; libs[i].name; i++)
{
if (libs[i].base)
CloseLibrary (libs[i].base);
libs[i].base = 0;
}
}